*Media data analysis for "Media Coverage of the Senate Filibuster and Its Effects on Public Opinion"

*Figure 1

*FBmedia_congress_pcts.data is created from the main FBmedia.dta file based on the following xtab
*tab2 FBdetail congress if article_type~=0 & wire~=1, col 

use "FBmedia_congress_pcts.dta", clear
twoway line failure congress, scheme(plotplain) yscale(range(0 80)) ylabel(0(20)80) ytitle("Failure %", size(small)) xtitle("Congress", size(small))
graph save "Graph" "detail_failure.gph", replace
twoway line general congress, scheme(plotplain) yscale(range(0 80)) ylabel(0(20)80) ytitle("General %", size(small)) xtitle("Congress", size(small))
graph save "Graph" "detail_general.gph", replace
twoway line fbuster congress, scheme(plotplain) yscale(range(0 80)) ylabel(0(20)80) ytitle("Filibuster %", size(small)) xtitle("Congress", size(small))
graph save "Graph" "detail_fbuster.gph", replace
twoway line obstruct congress, scheme(plotplain) yscale(range(0 80)) ylabel(0(20)80) ytitle("Obstruct %", size(small)) xtitle("Congress", size(small))
graph save "Graph" "detail_obstruct.gph", replace
graph combine "detail_failure.gph" "detail_general.gph" "detail_fbuster.gph" "detail_obstruct.gph"


*Figure 2

use "FBmedia.dta", clear

gen failure=1 if FBdetail==0
gen gendesc=1 if FBdetail==1
gen fbuster=1 if FBdetail==2
gen minobst=1 if FBdetail==3
graph bar (sum) failure gendesc fbuster minobst if wire~=1 & article_type~=0, stack over(sourcecat) scheme(plotplain) bar(1, color(gs4)) bar(2, color(gs7)) bar(3, color(gs10)) bar(4, color(gs13))


*Figure 3

gen none=1 if coalitions==0
gen against=1 if coalitions==1
gen support=1 if coalitions==2
gen both=1 if coalitions==3
graph bar (sum) none against support both if wire~=1 & article_type~=0, stack over(sourcecat) scheme(plotplain) bar(1, color(gs4)) bar(2, color(gs7)) bar(3, color(gs10)) bar(4, color(gs13))


*OA

**Figure A1

contract congress fid if wire~=1 & article_type~=0, freq(congfid)
collapse (count) fidttl=fid (sum) itemttl=congfid, by(congress)
label variable congress "Congress"
label variable fidttl "Filibuster Cases"
label variable itemttl "Media Items"
graph bar (asis) fidttl itemttl, over(congress) scheme(plotplain) yscale(range(0 250)) ylabel(0(50)250) 

**Tables A1-A3


tab FBdetail if wire==1
tab coalitions if wire==1
tab purpose if wire==1
